inherited FCadFormaPagamento: TFCadFormaPagamento
  Left = 436
  Top = 202
  Caption = 'Cadastro de Forma de Pagamento'
  PixelsPerInch = 96
  TextHeight = 13
  inherited pnl1: TPanel
    Height = 97
    inherited pnl7: TPanel
      Height = 0
    end
  end
  inherited pnl2: TPanel
    Top = 97
    Height = 390
    object lbl3: TLabel [5]
      Left = 16
      Top = 112
      Width = 73
      Height = 13
      Caption = 'FORPAGDESC'
      FocusControl = dbedt3
    end
    object lbl4: TLabel [6]
      Left = 16
      Top = 64
      Width = 55
      Height = 13
      Caption = 'FORPAGID'
      FocusControl = dbedt4
    end
    inherited BtNovo: TBitBtn
      TabOrder = 4
    end
    inherited BtGravar: TBitBtn
      TabOrder = 3
    end
    inherited BtCancelar: TBitBtn
      TabOrder = 5
    end
    inherited BtExcluir: TBitBtn
      TabOrder = 6
    end
    inherited pnl15: TPanel
      TabOrder = 7
    end
    object dbedt3: TDBEdit
      Left = 16
      Top = 128
      Width = 849
      Height = 21
      DataField = 'FORPAGDESC'
      DataSource = dsPadrao
      TabOrder = 0
    end
    object dbedt4: TDBEdit
      Left = 16
      Top = 80
      Width = 134
      Height = 21
      DataField = 'FORPAGID'
      DataSource = dsPadrao
      ReadOnly = True
      TabOrder = 8
    end
    object dbrgrpFORPAGGERAOUTRO: TDBRadioGroup
      Left = 16
      Top = 160
      Width = 185
      Height = 105
      Caption = 'Gera outra Obriga'#231#227'o ?'
      DataField = 'FORPAGGERAOUTRO'
      DataSource = dsPadrao
      Items.Strings = (
        'Sim'
        'N'#227'o')
      TabOrder = 1
      Values.Strings = (
        'SIM'
        'NAO')
    end
    object dbrgrpFORPAGMOVIMENTA: TDBRadioGroup
      Left = 225
      Top = 162
      Width = 185
      Height = 103
      Caption = 'Essa obriga'#231#227'o movimenta ?'
      DataField = 'FORPAGMOVIMENTA'
      DataSource = dsPadrao
      Items.Strings = (
        'Caixa'
        'Banco'
        'Cheque Pr'#243'prio'
        'Cheque de Terceiro')
      TabOrder = 2
      Values.Strings = (
        'CAIXA'
        'BANCO'
        'PROPRIO'
        'TERCEIRO')
    end
  end
  inherited qPadrao: TQuery
    SQL.Strings = (
      'SELECT * FROM FORMAPAGAMENTO'
      'WHERE 1 = -1')
    object qPadraoFORPAGGERAOUTRO: TStringField
      FieldName = 'FORPAGGERAOUTRO'
      Origin = '"BDSISTEMA.FDB".FORMAPAGAMENTO.FORPAGGERAOUTRO'
      Required = True
      Size = 3
    end
    object qPadraoFORPAGMOVIMENTA: TStringField
      FieldName = 'FORPAGMOVIMENTA'
      Origin = '"BDSISTEMA.FDB".FORMAPAGAMENTO.FORPAGMOVIMENTA'
      Required = True
      Size = 10
    end
    object qPadraoFORPAGDESC: TStringField
      FieldName = 'FORPAGDESC'
      Origin = '"BDSISTEMA.FDB".FORMAPAGAMENTO.FORPAGDESC'
      Required = True
      Size = 100
    end
    object qPadraoFORPAGID: TIntegerField
      FieldName = 'FORPAGID'
      Origin = '"BDSISTEMA.FDB".FORMAPAGAMENTO.FORPAGID'
      Required = True
    end
  end
end
